home *** CD-ROM | disk | FTP | other *** search
- object frmLook: TfrmLook
- Left = 288
- Top = 172
- BorderIcons = [biSystemMenu]
- BorderStyle = bsDialog
- Caption = 'Set ScrollBars'
- ClientHeight = 407
- ClientWidth = 567
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Position = poScreenCenter
- OnCreate = FormCreate
- OnShow = FormShow
- PixelsPerInch = 120
- TextHeight = 16
- object ImageXTowards: TImage
- Left = 9
- Top = 240
- Width = 337
- Height = 106
- Picture.Data = {<image000.bmp>}
- end
- object ImageYTowards: TImage
- Left = 352
- Top = 6
- Width = 188
- Height = 340
- Picture.Data = {<image001.bmp>}
- end
- object LabelInfoAway: TLabel
- Left = 9
- Top = 9
- Width = 336
- Height = 152
- AutoSize = False
- Caption =
- 'Use the scrollbars or the textboxes below to specify the locatio' +
- 'n of your point of view relative to the object you are away from' +
- '. To choose which object you wish to look away from, use the Vie' +
- 'w Wizard (Edit/View Wizard).'
- Visible = False
- end
- object Label2: TLabel
- Left = 16
- Top = 169
- Width = 110
- Height = 17
- AutoSize = False
- Caption = '&Horizontal Plane Angle:'
- FocusControl = spinX
- end
- object Label3: TLabel
- Left = 16
- Top = 201
- Width = 98
- Height = 17
- AutoSize = False
- Caption = '&Vertical Plane Angle:'
- FocusControl = scrollY
- end
- object ImageXAway: TImage
- Left = 9
- Top = 240
- Width = 337
- Height = 106
- Picture.Data = {<image002.bmp>}
- end
- object ImageYAway: TImage
- Left = 352
- Top = 6
- Width = 188
- Height = 340
- Picture.Data = {<image003.bmp>}
- end
- object LabelInfoTowards: TLabel
- Left = 9
- Top = 9
- Width = 336
- Height = 152
- AutoSize = False
- Caption =
- 'Use the scrollbars or the textboxes below to specify the locatio' +
- 'n of your point of view relative to the object you are looking t' +
- 'owards. To choose which object you wish to look towards, use the' +
- ' View Wizard (Edit/View Wizard).'
- end
- object scrollX: TScrollBar
- Left = 9
- Top = 352
- Width = 337
- Height = 16
- LargeChange = 10
- Max = 180
- Min = -180
- TabOrder = 4
- TabStop = False
- OnScroll = scrollScroll
- end
- object scrollY: TScrollBar
- Left = 544
- Top = 6
- Width = 16
- Height = 340
- Kind = sbVertical
- LargeChange = 10
- Max = 180
- Min = -180
- TabOrder = 5
- TabStop = False
- OnScroll = scrollScroll
- end
- object butOK: TButton
- Left = 473
- Top = 377
- Width = 82
- Height = 24
- Caption = '&OK'
- TabOrder = 3
- OnClick = butOKClick
- end
- object butCancel: TButton
- Left = 377
- Top = 377
- Width = 82
- Height = 24
- Caption = '&Cancel'
- TabOrder = 2
- OnClick = butCancelClick
- end
- object spinX: TSpinEdit
- Left = 165
- Top = 165
- Width = 59
- Height = 32
- Hint = 'Scales the viewing window'
- AutoSize = False
- Increment = 5
- MaxValue = 180
- MinValue = -180
- TabOrder = 0
- Value = 0
- OnChange = SpinChange
- end
- object spinY: TSpinEdit
- Left = 165
- Top = 197
- Width = 59
- Height = 32
- Hint = 'Scales the viewing window'
- AutoSize = False
- Increment = 5
- MaxValue = 180
- MinValue = -180
- TabOrder = 1
- Value = 0
- OnChange = SpinChange
- end
- end
-